<html>
<head>

<!-- 

Klenwell HTA Template

Last Updated: May 2007
Author: Tom at klenwell@gmail.com

NOTES
	for more help, see: 
		http://www.microsoft.com/technet/scriptcenter/topics/htas/tutorial2.mspx

-->

<!-- Script Meta Settings -->
<title>Klenwell VBScript HTA Template</title>
<HTA:APPLICATION 
     ID="kwTemplate" 
     APPLICATIONNAME="Klenwell Template"
     SCROLL="yes"
     SINGLEINSTANCE="yes"
>

<!-- Style Settings -->
<style type="text/css">

/* stylesheet defaults */
h1, h2, h3, h4, h5, h6 { margin:0 0 4px; padding:0; }
p, pre, blockquote, ul, ol, dl, address { margin: 0; padding: 0; }
ul li { list-style:none; margin-left:.5em; }
form, fieldset { margin: 0; padding: 0; }
dd, blockquote { margin-left: .5em; }
form label { cursor: pointer; }
fieldset { border: none; }
input, select, textarea { font-size: 100%; }
table { border-collapse:collapse; }
td { vertical-align:top; }
.clear { clear:both;}
.left { float:left; }
.right { float:right; }

/* body-level settings */
body 
{ 
 margin:0; background-color:#000; 
 background-image:url('');
 background-position:top center;
 background-repeat:repeat-y;
}
.page 
{ 
 margin:0 auto; 
 font-family:Arial, Helvetica, sans-serif;
 font-size:12px;
 color:#006;
 border:1px solid #666;  border-width:0px; 
}
a { color:#003366; text-decoration:none; }
a:hover { color:#0000ff; }

/* masthead */
#masthead_panel 
{
 padding:1em;
 font-weight:normal;
 font-family:"Trebuchet MS", Helvetica, sans-serif;
}
#masthead_panel h2 {}

/* core */
#core_panel
{
 margin:0 10%;
}
#form
{
 text-align:center;
}
#RunButton
{
 display:block;
 margin:10px auto;
 font-size:12px;
}

#output_panel
{
 margin:10px 10%;
}
#OutputArea
{
 padding:1px;
 font:11px monospace;
 background:#f3f3ff;
 color:#036;
 border:1px solid #ccf;
}


/* footer */
#footer_panel
{
 margin:0 auto;
 padding:4px 0;
 clear:both;
 text-align:center;
 font:11px/1.4em Verdana, Geneva, sans-serif;
 color:#ccc;
 background-color:#eee;
 border:1px solid #ccc; border-width:1px 0;
}
#footer_panel .left { margin-left:4px; }
#footer_panel .right { margin-right:4px; }
#footer_center { width:80%; margin:0 auto; }
</style>
<!-- end Style Settings -->

</head>

<SCRIPT LANGUAGE="VBScript">

' PUT YOUR SUBROUTINES HERE
Sub RunScript
	OutputArea.InnerHTML = "running script..."
	Msgbox "Message Box says:" & VbCrLf & "TextField.value = " & TextField.value
	OutputArea.InnerHTML = "script complete"
End Sub

</SCRIPT>



<body STYLE="font:14pt arial; color:white; 
	filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=0, StartColorStr='#ffffff', EndColorStr='#aaaaff')">
<div class="page">

<!-- Header -->
<div id="masthead_panel">
<h2>Klenwell VBScript HTA Template</h2>
</div>

<div id="core_panel">

<!-- Main Script Form -->
<div id="form">
<input type="text" name="TextField" value="TextField.value" size="16" / >
<input type="button" name="RunButton"  value="click to test script" id="RunButton" class="button" onClick="RunScript" />
</div>

<!-- Output Area -->
<div id="output_panel">
<h4>output</h4>
<div name="OutputArea" id="OutputArea">
click to run script
</div>
</div>

</div>


<div id="footer_panel">
<div class="left">a <a href="http://klenwell.net/">klenwell</a> project</div>
<div class="right"></div>
<div class="clear"></div>
</div>

</div>
</body>
</html>